home *** CD-ROM | disk | FTP | other *** search
/ Design Mapio / Design Mapio.iso / pc / browser.dxr / 00053.ls < prev    next >
Encoding:
Text File  |  1997-01-29  |  1.5 KB  |  96 lines

  1. on setgnum
  2.   global gnum, gmarkerandnum
  3.   case gmarkerandnum of
  4.     "A1":
  5.       set gnum to 1
  6.     "A2":
  7.       set gnum to 15
  8.     "A31":
  9.       set gnum to 29
  10.     "A32":
  11.       set gnum to 38
  12.     "A33":
  13.       set gnum to 47
  14.     "A34":
  15.       set gnum to 56
  16.     "A35":
  17.       set gnum to 65
  18.     "A36":
  19.       set gnum to 74
  20.     "A4":
  21.       set gnum to 83
  22.     "B1":
  23.       set gnum to 86
  24.     "B2":
  25.       set gnum to 98
  26.     "C1":
  27.       set gnum to 122
  28.     "C2":
  29.       set gnum to 136
  30.     "D1":
  31.       set gnum to 142
  32.     "D2":
  33.       set gnum to 162
  34.     "D3":
  35.       set gnum to 170
  36.     "D4":
  37.       set gnum to 174
  38.     "E1":
  39.       set gnum to 178
  40.     "E2":
  41.       set gnum to 226
  42.     "E3":
  43.       set gnum to 234
  44.     "F1":
  45.       set gnum to 238
  46.     "F2":
  47.       set gnum to 240
  48.     "F3":
  49.       set gnum to 242
  50.     "F4":
  51.       set gnum to 244
  52.     "F5":
  53.       set gnum to 246
  54.     "F6":
  55.       set gnum to 248
  56.     "F7":
  57.       set gnum to 250
  58.     "F8":
  59.       set gnum to 252
  60.     "F9":
  61.       set gnum to 254
  62.     "F10":
  63.       set gnum to 256
  64.     "G1":
  65.       set gnum to 258
  66.     "G2":
  67.       set gnum to 270
  68.     "G3":
  69.       set gnum to 278
  70.     "G4":
  71.       set gnum to 290
  72.     "G5":
  73.       set gnum to 298
  74.     "G6":
  75.       set gnum to 306
  76.     "G7":
  77.       set gnum to 310
  78.     "H1":
  79.       set gnum to 318
  80.     "H2":
  81.       set gnum to 327
  82.     "H3":
  83.       set gnum to 336
  84.     "H4":
  85.       set gnum to 345
  86.     "H5":
  87.       set gnum to 354
  88.     "H6":
  89.       set gnum to 363
  90.     "H7":
  91.       set gnum to 372
  92.     "H8":
  93.       set gnum to 381
  94.   end case
  95. end
  96.